say 'Error: Cannot find TaskBox.exe in PATH directories.'
exit
end
if stream('TaskBox.dll', 'command', 'query exists') = '' then
do
say 'Error: Cannot find TaskBox.dll in the current directory.'
exit
end
if SysCreateObject('WPProgram', 'TaskBox', '<WP_DESKTOP>', 'EXENAME='programName';STARTUPDIR='directory()';PROGTYPE=PM;OBJECTID=<TaskBox>;PARAMETERS=%', 'u') = 0 then
say 'Error: Cannot create object.'
else
say 'The program object was successfully created on the desktop.'